home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 11 / FM Towns Free Software Collection 11.iso / t_os / tool / mmlc / sample / sample3.m2 < prev    next >
Encoding:
Text File  |  1995-07-24  |  18.8 KB  |  429 lines
  1. /*
  2.     MML compiler [M2] ***********************************
  3.      Sample music 3 / presented by SHINNOSUKE 1995
  4. */
  5.  
  6. .title     [M2] Sample music 3
  7. .copyright (c)SHINNOSUKE 1995
  8.  
  9. .tempo     100
  10. .signature 4/4
  11.  
  12. .division 96
  13.  
  14. .begin
  15.  
  16. GmSystem
  17. {
  18.   1[1] = @X[7E 7F 09 01]R2;
  19. }
  20.  
  21. Set
  22. {
  23.   1[1] = V15O2@35Q6 %C;
  24.   2[1] = V15O5Q7@76@C91/50@C93/100 %C;
  25.   3[1] = V10Q8@53@C91/50@C93/50 %L10;
  26.   4[1] = V10Q6@17@C91/30@C93/80 %R10;
  27.   5[1] = V9Q6@31@C91/127@C93/55 %L20;
  28.   6[1] = V9Q8O5@30@C91/127@C93/127 %R20;
  29.   7[1] = V13O5Q7@81@C91/127@C93/0 %C;
  30.   8[1] = V13O4Q7@1@C91/40@C93/10 %CR2;
  31. }
  32.  
  33. Intro {
  34.   5[1] = O4L8(<G.G.G>|C.C.C|E.E.E)(<G.G.G>|<B.B.B>|D.D.D)
  35.          (<A.A.A>|C.C.C|F.F.F)(<G4G4>|<B4B4>|E4D4)
  36.          (<G.G.G>|C.C.C|E.E.E)(<G.G.G>|<B.B.B>|D.D.D)
  37.          (<A.A.A>|C.C.C|F.F.F)(<G4G4>|<B4B4>|E4D4)
  38.          (<G.G.G>|C.C.C|E.E.E)(<G.G.G>|<B.B.B>|D.D.D)
  39.          (<A.A.A>|C.C.C|F.F.F)(<G4G4>|<B4B4>|E4D4)
  40.          (<G.G.G>|C.C.C|E.E.E)(<G.G.G>|<B.B.B>|D.D.D)
  41.          (<A.A.A>|C.C.C|F.F.F)(<G4G4>|<B4B4>|E4D4);
  42.   6[1] = L8$(C2D.E.FG1)4;
  43.   7[0] = $(_SLIDE(2,-4096,0,64,8)R4.R2)8;
  44.   7[1] = L8(C.C.C<B.A.GA.A.AG.E.&E>|E.E.ED.C.<B>C.C.C<B.G.&G>)
  45.          (C.C.CD.C.<B>C1|E.E.EF.E.DE1)
  46.          (C.C.C<B.A.GA.A.AG.E.&E>|E.E.ED.C.<B>C.C.C<B.G.&G>)
  47.          (C.C.CD.C.<B>C1|E.E.EF.E.DE1);
  48.   8[1] = O4L2$((<G>|C|E)(<G>|<B>|D)(<A>|C|F)(<G4G4>|<B4B4>|E4D4))4;
  49.  10[1] = V15O2L8R1R1R1R1R1R2>D.<B.GC2C2C2L16>DDD<BBBGG;
  50.  10[2] = O2@V100L16;
  51. }
  52.  
  53. #for 2
  54.  
  55. Section-A-1
  56. {
  57.   1[1] = L8$(C4R.C16)2<G4R.G16G4B>D$(F4R.F16)2E4R.E16E4<GB>
  58.          $(D4R.D16)2$(E4R.E16)2F4R.F16F+4R.F+16 G4R.G16<G4R.G16>;
  59.   2[1] = L8C.C.CG.F.ED2<B2A.A.A>C.<B.AB2G2 
  60.          F.F.F A.G.FG.G.G B.A.GA.A.A >C.<B.A>D1;
  61.   5[1] = (<G.G.GG.G.G>|C.C.CC.C.C|E.E.EE.E.E)
  62.          (<G.G.GG.G.G>|<B.B.BB.B.B>|D.D.DD.D.D)
  63.          (<F.F.FF.F.F>|<A.A.AA.A.A>|C.C.CC.C.C)
  64.          (<E.E.EE.E.E>|<G.G.GG.G.G>|<B.B.BB.B.B>)
  65.          (<D.D.DD.D.D>|<F.F.FF.F.F>|<A.A.AA.A.A>)
  66.          (<E.E.EE.E.E>|<G.G.GG.G.G>|<B.B.BB.B.B>)
  67.          (<F.F.FF+.F+.F+>|<A.A.AA.A.A>|C.C.CC.C.C)
  68.          (<G.G.GG4G4>|C.C.C<B4B4>|D.D.DD4D4);
  69.   6[1] = L8(C.C.CG.F.E|E.E.EE.D.C)(D2<B2>|<B2G2>)
  70.          (<A.A.A>C.<B.A>|<F.F.FA.G.F>)(<B2G2>|<G2E2>)
  71.          (<F.F.FA.G.F>|<D.D.DF.E.D>)(<G.G.GB.A.G>|<E.E.EG.F.E>)
  72.          (<A.A.A>C.<B.A>|<F.F.FA.G.F>)(D1|C2<B2>);
  73.   8[1] = O4L1(<G>|C|E)(<G>|<B>|D)(<F>|<A>|C)(<E>|<G>|<B>)(<D>|<F>|<A>)
  74.          (<E>|<G>|<B>)(<F2F+2>|<A2A2>|C2C2)(<G2G2>|C2<B2>|D2D2);
  75.  10[1] = O2L8$(CRDR16C16CRDR)7CRDR16C16R8.>D16<B16D16G16C16;
  76.  10[2] = >C#,110<F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  77.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  78.          $(F#,90F#,70F#,110F#,70)2
  79.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  80.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  81.          $(F#,90F#,70F#,110F#,70)2
  82.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  83.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  84.          $(F#,90F#,70F#,110F#,70)2
  85.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  86.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110R2;
  87. }
  88.  
  89. Section-A-2
  90. {
  91.   1[1] = L8$(C4R.C16)2<G4R.G16G4B>D$(F4R.F16)2E4R.E16E4<GB>
  92.          $(D4R.D16)2$(E4R.E16)2F4R.F16F+4R.F+16 G4R.G16<G4R.G16>;
  93.   2[1] = L8C.C.CG.F.ED2<B2A.A.A>C.<B.AB2G2 
  94.          F.F.F A.G.FG.G.G B.A.GA.A.A >C.<B.A>D2.C<B>;
  95.   5[1] = (<G.G.GG.G.G>|C.C.CC.C.C|E.E.EE.E.E)
  96.          (<G.G.GG.G.G>|<B.B.BB.B.B>|D.D.DD.D.D)
  97.          (<F.F.FF.F.F>|<A.A.AA.A.A>|C.C.CC.C.C)
  98.          (<E.E.EE.E.E>|<G.G.GG.G.G>|<B.B.BB.B.B>)
  99.          (<D.D.DD.D.D>|<F.F.FF.F.F>|<A.A.AA.A.A>)
  100.          (<E.E.EE.E.E>|<G.G.GG.G.G>|<B.B.BB.B.B>)
  101.          (<F.F.FF+.F+.F+>|<A.A.AA.A.A>|C.C.CC.C.C)
  102.          (<G.G.GG4G4>|C.C.C<B4B4>|D.D.DD4D4);
  103.   6[1] = L8(C.C.CG.F.E|E.E.EE.D.C)(D2<B2>|<B2G2>)
  104.          (<A.A.A>C.<B.A>|<F.F.FA.G.F>)(<B2G2>|<G2E2>)
  105.          (<F.F.FA.G.F>|<D.D.DF.E.D>)(<G.G.GB.A.G>|<E.E.EG.F.E>)
  106.          (<A.A.A>C.<B.A>|<F.F.FA.G.F>)(D1|C2<B2>);
  107.   8[1] = O4L1(<G>|C|E)(<G>|<B>|D)(<F>|<A>|C)(<E>|<G>|<B>)(<D>|<F>|<A>)
  108.          (<E>|<G>|<B>)(<F2F+2>|<A2A2>|C2C2)(<G2G2>|C2<B2>|D2D2);
  109.  10[1] = $(CRDR16C16CRDR)7C.D16C16D8C16 R8.>D16<B16D16G16C16;
  110.  10[2] = >C#,110<F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  111.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  112.          $(F#,90F#,70F#,110F#,70)2
  113.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  114.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  115.          $(F#,90F#,70F#,110F#,70)2
  116.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  117.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  118.          $(F#,90F#,70F#,110F#,70)2
  119.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  120.          >G4R8.G16<R2;
  121. }
  122.  
  123. Section-B
  124. {
  125.   1[1] = L8$(<F.F.FG.G.G>$(C.C.C)2)4;
  126.   2[1] = L8C.C.CD.E.FG2.C<B> C.C.CD.E.F FG16E2R16 C<B>
  127.          C.C.CD.E.FG2.C<B> C.C.CD.E.F F2E2;
  128.   5[1] = (<F.F.F>|<A.A.A>|C.C.C)(<G.G.G>|<B.B.B>|D.D.D)
  129.          (<G.G.G>|C.C.C|E.E.E)(<A.A.A>|C.C.C|E.E.E)
  130.          (<F.F.F>|<A.A.A>|C.C.C)(<G.G.G>|<B.B.B>|D.D.D)
  131.          (<G.G.G>|C.C.C|E.E.E)(<G.G.G>|<B-.B-.B->|E.E.E)
  132.          (<F.F.F>|<A.A.A>|C.C.C)(<G.G.G>|<B.B.B>|D.D.D)
  133.          (<G.G.G>|C.C.C|E.E.E)(<A.A.A>|C.C.C|E.E.E)
  134.          (<F.F.F>|<A.A.A>|C.C.C)(<G.G.G>|<B.B.B>|D.D.D)
  135.          (<G.G.G>|C.C.C|F.F.F)(<G.G.G>|C.C.C|E.E.E);
  136.   6[1] = (C.C.CD.E.FG2.C<B>|<A.A.AB.>C.DE2.<AG>)
  137.          (C.C.CD.E.FFG16E2R16C<B>|<A.A.AB.>C.DDE16C2R16<AG>)
  138.          (C.C.CD.E.FG2.C<B>|<A.A.AB.>C.DE2.<AG>)
  139.          (C.C.CD.E.F F2E2|<A.A.AB.>C.DD2C2);
  140.   8[1] = L2(<F>|<A>|C)(<G>|<B>|D)(<G>|C|E)(<A>|C|E)
  141.          (<F>|<A>|C)(<G>|<B>|D)(<G>|C|E)(<G>|<B->|E)
  142.          (<F>|<A>|C)(<G>|<B>|D)(<G>|C|E)(<A>|C|E)
  143.          (<F>|<A>|C)(<G>|<B>|D)(<G>|C|F)(<G>|C|E);
  144.  10[1] = $(CRDR16C16CRDR)7C16>D8D16<B16B8C16
  145.          L24BADBBBL8(G16G16>C#8<|C8C8);
  146.  10[2] = >C#,110<F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  147.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  148.          $(F#,90F#,70F#,110F#,70)2
  149.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  150.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  151.          $(F#,90F#,70F#,110F#,70)2
  152.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  153.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  154.          $(F#,90F#,70F#,110F#,70)2
  155.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  156.          >G4R8.G16C#8<R4.;
  157. }
  158.  
  159. #next
  160.  
  161. Section-C
  162. {
  163.   1[1] = $(C.C.C<G.G.G>F.F.F E.E16<G.G16>)4;
  164.   5[1] = O4L8(<G.G.G>|C.C.C|E.E.E)(<G.G.G>|<B.B.B>|D.D.D)
  165.          (<A.A.A>|C.C.C|F.F.F)(<G4G4>|<B4B4>|E4D4)
  166.          (<G.G.G>|C.C.C|E.E.E)(<G.G.G>|<B.B.B>|D.D.D)
  167.          (<A.A.A>|C.C.C|F.F.F)(<G4G4>|<B4B4>|E4D4)
  168.          (<G.G.G>|C.C.C|E.E.E)(<G.G.G>|<B.B.B>|D.D.D)
  169.          (<A.A.A>|C.C.C|F.F.F)(<G4G4>|<B4B4>|E4D4)
  170.          (<G.G.G>|C.C.C|E.E.E)(<G.G.G>|<B.B.B>|D.D.D)
  171.          (<A.A.A>|C.C.C|F.F.F)(<G4G4>|<B4B4>|E4D4);
  172.   6[1] = L8$(C2D.E.FG1)4;
  173.   7[0] = $(_SLIDE(2,-4096,0,64,8)R4.R2)8;
  174.   7[1] = L8(C.C.C<B.A.GA.A.AG.E.&E>|E.E.ED.C.<B>C.C.C<B.G.&G>)
  175.          (C.C.CD.C.<B>C1|E.E.EF.E.DE1)
  176.          (C.C.C<B.A.GA.A.AG.E.&E>|E.E.ED.C.<B>C.C.C<B.G.&G>)
  177.          (C.C.CD.C.<B>C1|E.E.EF.E.DE1);
  178.   8[1] = O4L2$((<G>|C|E)(<G>|<B>|D)(<A>|C|F)(<G4G4>|<B4B4>|E4D4))4;
  179.  10[1] = $(CRDRCCDR)7RDDCL16>DDD<BBBGGL8;
  180.  10[2] = >C#,110<F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  181.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  182.          $(F#,90F#,70F#,110F#,70)2
  183.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  184.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  185.          $(F#,90F#,70F#,110F#,70)2
  186.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  187.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  188.          $(F#,90F#,70F#,110F#,70)2
  189.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  190.          >G4R8.G16<R2;
  191. }
  192.  
  193. Section-A-1
  194. {
  195.   1[1] = L8$(C4R.C16)2<G4R.G16G4B>D$(F4R.F16)2E4R.E16E4<GB>
  196.          $(D4R.D16)2$(E4R.E16)2F4R.F16F+4R.F+16G4R.G16<G4R.G16>;
  197.   2[1] = L8C.C.CG.F.ED2<B2A.A.A>C.<B.AB2G2 
  198.          F.F.FA.G.FG.G.G B.A.GA.A.A >C.<B.A>D1;
  199.   3[1] = O4L1(<G>|C|E)(<G>|<B>|D)(<F>|<A>|C)(<E>|<G>|<B>)(<D>|<F>|<A>)
  200.          (<E>|<G>|<B>)(<F2F+2>|<A2A2>|C2C2)(<G2G2>|C2<B2>|D2D2);
  201.   4[1] = O5L16$(<G>CEC)4$(<GB>D<B>)4$(<FA>C<A>)4$(<EGBG>)4$(<DFAF>)4
  202.          $(<EGBG>)4$(<FA>C<A>)2$(<F+A>C<A>)2$(<G>CDC)2$(<GB>D<B>)2;
  203.   5[1] = (<G.G.GG.G.G>|C.C.CC.C.C|E.E.EE.E.E)
  204.          (<G.G.GG.G.G>|<B.B.BB.B.B>|D.D.DD.D.D)
  205.          (<F.F.FF.F.F>|<A.A.AA.A.A>|C.C.CC.C.C)
  206.          (<E.E.EE.E.E>|<G.G.GG.G.G>|<B.B.BB.B.B>)
  207.          (<D.D.DD.D.D>|<F.F.FF.F.F>|<A.A.AA.A.A>)
  208.          (<E.E.EE.E.E>|<G.G.GG.G.G>|<B.B.BB.B.B>)
  209.          (<F.F.FF+.F+.F+>|<A.A.AA.A.A>|C.C.CC.C.C)
  210.          (<G.G.GG4G4>|C.C.C<B4B4>|D.D.DD4D4);
  211.   6[1] = L8(C.C.CG.F.E|E.E.EE.D.C)(D2<B2>|<B2G2>)
  212.          (<A.A.A>C.<B.A>|<F.F.FA.G.F>)(<B2G2>|<G2E2>)
  213.          (<F.F.FA.G.F>|<D.D.DF.E.D>)(<G.G.GB.A.G>|<E.E.EG.F.E>)
  214.          (<A.A.A>C.<B.A>|<F.F.FA.G.F>)(D1|C2<B2>);
  215.   8[1] = O4L1(<G>|C|E)(<G>|<B>|D)(<F>|<A>|C)(<E>|<G>|<B>)(<D>|<F>|<A>)
  216.          (<E>|<G>|<B>)(<F2F+2>|<A2A2>|C2C2)(<G2G2>|C2<B2>|D2D2);
  217.  10[1] = $(CRDR16C16CRDR)7CRDR16C16R8.>D16<B16D16G16C16;
  218.  10[2] = >C#,110<F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  219.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  220.          $(F#,90F#,70F#,110F#,70)2
  221.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  222.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  223.          $(F#,90F#,70F#,110F#,70)2
  224.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  225.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  226.          $(F#,90F#,70F#,110F#,70)2
  227.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  228.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110R2;
  229. }
  230.  
  231. Section-A-2
  232. {
  233.   1[1] = L8$(C4R.C16)2<G4R.G16G4B>D$(F4R.F16)2E4R.E16E4<GB>
  234.          $(D4R.D16)2$(E4R.E16)2F4R.F16F+4R.F+16G4R.G16<G4R.G16>;
  235.   2[1] = L8C.C.CG.F.ED2<B2A.A.A>C.<B.AB2G2 
  236.          F.F.FA.G.FG.G.GB.A.GA.A.A>C.<B.A>D2.C<B>;
  237.   3[1] = O5L1(<G>|C|E)(<G>|<B>|D)(<F>|<A>|C)(<E>|<G>|<B>)(<D>|<F>|<A>)
  238.          (<E>|<G>|<B>)(<F2F+2>|<A2A2>|C2C2)(<G2G2>|C2<B2>|D2D2);
  239.   4[1] = O6L16$(<G>CEC)4$(<GB>D<B>)4$(<FA>C<A>)4$(<EGBG>)4$(<DFAF>)4
  240.          $(<EGBG>)4$(<FA>C<A>)2$(<F+A>C<A>)2$(<G>CDC)2$(<GB>D<B>)2;
  241.   5[1] = (<G.G.GG.G.G>|C.C.CC.C.C|E.E.EE.E.E)
  242.          (<G.G.GG.G.G>|<B.B.BB.B.B>|D.D.DD.D.D)
  243.          (<F.F.FF.F.F>|<A.A.AA.A.A>|C.C.CC.C.C)
  244.          (<E.E.EE.E.E>|<G.G.GG.G.G>|<B.B.BB.B.B>)
  245.          (<D.D.DD.D.D>|<F.F.FF.F.F>|<A.A.AA.A.A>)
  246.          (<E.E.EE.E.E>|<G.G.GG.G.G>|<B.B.BB.B.B>)
  247.          (<F.F.FF+.F+.F+>|<A.A.AA.A.A>|C.C.CC.C.C)
  248.          (<G.G.GG4G4>|C.C.C<B4B4>|D.D.DD4D4);
  249.   6[1] = L8(C.C.CG.F.E|E.E.EE.D.C)(D2<B2>|<B2G2>)
  250.          (<A.A.A>C.<B.A>|<F.F.FA.G.F>)(<B2G2>|<G2E2>)
  251.          (<F.F.FA.G.F>|<D.D.DF.E.D>)(<G.G.GB.A.G>|<E.E.EG.F.E>)
  252.          (<A.A.A>C.<B.A>|<F.F.FA.G.F>)(D1|C2<B2>);
  253.   8[1] = O4L1(<G>|C|E)(<G>|<B>|D)(<F>|<A>|C)(<E>|<G>|<B>)(<D>|<F>|<A>)
  254.          (<E>|<G>|<B>)(<F2F+2>|<A2A2>|C2C2)(<G2G2>|C2<B2>|D2D2);
  255.  10[1] = $(CRDR16C16CRDR)7C.D16C16D8C16 R8.>D16<B16D16G16C16;
  256.  10[2] = >C#,110<F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  257.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  258.          $(F#,90F#,70F#,110F#,70)2
  259.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  260.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  261.          $(F#,90F#,70F#,110F#,70)2
  262.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  263.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  264.          $(F#,90F#,70F#,110F#,70)2
  265.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  266.          >G4R8.G16<R2;
  267. }
  268.  
  269. Section-B
  270. {
  271.   1[1] = L8$(<F.F.FG.G.G>$(C.C.C)2)4;
  272.   2[1] = L8C.C.CD.E.FG2.C<B>C.C.CD.E.FFG16E2R16C<B>
  273.          C.C.CD.E.FG2.C<B>C.C.CD.E.FF2E2;
  274.   3[1] = L2(<F>|<A>|C)(<G>|<B>|D)(<G>|C|E)(<A>|C|E)
  275.          (<F>|<A>|C)(<G>|<B>|D)(<G>|C|E)(<G>|<B->|E)
  276.          (<F>|<A>|C)(<G>|<B>|D)(<G>|C|E)(<A>|C|E)
  277.          (<F>|<A>|C)(<G>|<B>|D)(<G>|C|F)(<G>|C|E);
  278.   4[1] = $(<FA>C<A>)2$(<GB>D<B>)2$(<G>CEC)2$(<A>CEC)2
  279.          $(<FA>C<A>)2$(<GB>D<B>)2$(<G>CEC)2$(<GB->E<B->)2
  280.          $(<FA>C<A>)2$(<GB>D<B>)2$(<G>CEC)2$(<A>CEC)2
  281.          $(<FA>C<A>)2$(<GB>D<B>)2$(<G>CFC)2$(<G>CEC)2;
  282.   5[1] = (<F.F.F>|<A.A.A>|C.C.C)(<G.G.G>|<B.B.B>|D.D.D)
  283.          (<G.G.G>|C.C.C|E.E.E)(<A.A.A>|C.C.C|E.E.E)
  284.          (<F.F.F>|<A.A.A>|C.C.C)(<G.G.G>|<B.B.B>|D.D.D)
  285.          (<G.G.G>|C.C.C|E.E.E)(<G.G.G>|<B-.B-.B->|E.E.E)
  286.          (<F.F.F>|<A.A.A>|C.C.C)(<G.G.G>|<B.B.B>|D.D.D)
  287.          (<G.G.G>|C.C.C|E.E.E)(<A.A.A>|C.C.C|E.E.E)
  288.          (<F.F.F>|<A.A.A>|C.C.C)(<G.G.G>|<B.B.B>|D.D.D)
  289.          (<G.G.G>|C.C.C|F.F.F)(<G.G.G>|C.C.C|E.E.E);
  290.   6[1] = (C.C.CD.E.FG2.C<B>|<A.A.AB.>C.DE2.<AG>)
  291.          (C.C.CD.E.FFG16E2R16C<B>|<A.A.AB.>C.DDE16C2R16<AG>)
  292.          (C.C.CD.E.FG2.C<B>|<A.A.AB.>C.DE2.<AG>)
  293.          (C.C.CD.E.FF2E2|<A.A.AB.>C.DD2C2);
  294.   7[1] = L8(<F.F.F>|<A.A.A>)(<G.G.G>|<B.B.B>)
  295.          (<G.G.G>|C.C.C)(<A.A.A>|C.C.C)
  296.          (<F.F.F>|<A.A.A>)(<G.G.G>|<B.B.B>)
  297.          (<G.G.G>|C.C.C)(<G.G.G>|<B-.B-.B->)
  298.          (<F.F.F>|<A.A.A>)(<G.G.G>|<B.B.B>)
  299.          (<G.G.G>|C.C.C)(<A.A.A>|C.C.C)
  300.          (<F.F.F>|<A.A.A>)(<G.G.G>|<B.B.B>)
  301.          (F.F.F|C.C.C)(E.E.E|C.C.C);
  302.   8[1] = L2(<F>|<A>|C)(<G>|<B>|D)(<G>|C|E)(<A>|C|E)
  303.          (<F>|<A>|C)(<G>|<B>|D)(<G>|C|E)(<G>|<B->|E)
  304.          (<F>|<A>|C)(<G>|<B>|D)(<G>|C|E)(<A>|C|E)
  305.          (<F>|<A>|C)(<G>|<B>|D)(<G>|C|F)(<G>|C|E);
  306.  10[1] = $(CRDR16C16CRDR)7C16>D8D16<B16B8C16
  307.          L24BADBBBL8(G16G16>C#8<|C8C8);
  308.  10[2] = >C#,110<F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  309.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  310.          $(F#,90F#,70F#,110F#,70)2
  311.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  312.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  313.          $(F#,90F#,70F#,110F#,70)2
  314.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  315.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  316.          $(F#,90F#,70F#,110F#,70)2
  317.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  318.          >G4R8.G16C#8<R4.;
  319. }
  320.  
  321. Section-B(Key/D#)
  322. {
  323.   1[1] = L8$(<G+.G+.G+A+.A+.A+>$(D+.D+.D+)2)4;
  324.   2[1] = L8D+.D+.D+F.G.G+A+2.D+DD+.D+.D+F.G.G+G+A+16G2R16D+D
  325.          D+.D+.D+F.G.G+A+2.D+DD+.D+.D+F.G.G+G+2G2;
  326.   3[1] = L2(<G+>|C|D+)(<A+>|D|F)(<A+>|D+|G)(C|D+|G)
  327.          (<G+>|C|D+)(<A+>|D|F)(<A+>|D+|G)(<A+>|D-|G)
  328.          (<G+>|C|D+)(<A+>|D|F)(<A+>|D+|G)(C|D+|G)
  329.          (<G+>|C|D+)(<A+>|D|F)(<A+>|D+|G+)(<A+>|D+|G);
  330.   4[1] = $(<G+>CD+C)2$(<A+>DFD)2$(<A+>D+GD+)2$(CD+GD+)2
  331.          $(<G+>CD+C)2$(<A+>DFD)2$(<A+>D+GD+)2$(<A+>D-GD-)2
  332.          $(<G+>CD+C)2$(<A+>DFD)2$(<A+>D+GD+)2$(CD+GD+)2
  333.          $(<G+>CD+C)2$(<A+>DFD)2$(<A+>D+G+D+)2$(<A+>D+GD+)2;
  334.   5[1] = (<G+.G+.G+>|C.C.C|D+.D+.D+)(<A+.A+.A+>|D.D.D|F.F.F)
  335.          (<A+.A+.A+>|D+.D+.D+|G.G.G)(C.C.C|D+.D+.D+|G.G.G)
  336.          (<G+.G+.G+>|C.C.C|D+.D+.D+)(<A+.A+.A+>|D.D.D|F.F.F)
  337.          (<A+.A+.A+>|D+.D+.D+|G.G.G)(<A+.A+.A+>|D-.D-.D-|G.G.G)
  338.          (<G+.G+.G+>|C.C.C|D+.D+.D+)(<A+.A+.A+>|D.D.D|F.F.F)
  339.          (<A+.A+.A+>|D+.D+.D+|G.G.G)(C.C.C|D+.D+.D+|G.G.G)
  340.          (<G+.G+.G+>|C.C.C|D+.D+.D+)(<A+.A+.A+>|D.D.D|F.F.F)
  341.          (<A+.A+.A+>|D+.D+.D+|G+.G+.G+)(<A+.A+.A+>|D+.D+.D+|G.G.G);
  342.   6[1] = (D+.D+.D+F.G.G+A+2.D+D|C.C.CD.D+.FG2.C<A+>)
  343.          (D+.D+.D+F.G.G+G+A+16G2R16D+D|C.C.CD.D+.FFG16D+2R16C<A+>)
  344.          (D+.D+.D+F.G.G+A+2.D+D|C.C.CD.D+.FG2.C<A+>)
  345.          (D+.D+.D+F.G.G+ G+2G2|C.C.CD.D+.F F2D+2);
  346.   7[1] = L8(<G+.G+.G+>|C.C.C)(<A+.A+.A+>|D.D.D)
  347.          (<A+.A+.A+>|D+.D+.D+)(C.C.C|D+.D+.D+)
  348.          (<G+.G+.G+>|C.C.C)(<A+.A+.A+>|D.D.D)
  349.          (<A+.A+.A+>|D+.D+.D+)(<A+.A+.A+>|D-.D-.D-)
  350.          (<G+.G+.G+>|C.C.C)(<A+.A+.A+>|D.D.D)
  351.          (<A+.A+.A+>|D+.D+.D+)(C.C.C|D+.D+.D+)
  352.          (<G+.G+.G+>|C.C.C)(<A+.A+.A+>|D.D.D)
  353.          (G+.G+.G+|D+.D+.D+)(G.G.G|D+.D+.D+);
  354.   8[1] = L2(<G+>|C|D+)(<A+>|D|F)(<A+>|D+|G)(C|D+|G)
  355.          (<G+>|C|D+)(<A+>|D|F)(<A+>|D+|G)(<A+>|D-|G)
  356.          (<G+>|C|D+)(<A+>|D|F)(<A+>|D+|G)(C|D+|G)
  357.          (<G+>|C|D+)(<A+>|D|F)(<A+>|D+|G+)(<A+>|D+|G);
  358.  10[1] = L8O2L8$(CRDR16C16CRDR)7C16>D8D16<B16B8C16
  359.          L24BADBBBL8(G16G16>C#8<|C8C8);
  360.  10[2] = >C#,110<F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  361.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  362.          $(F#,90F#,70F#,110F#,70)2
  363.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  364.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  365.          $(F#,90F#,70F#,110F#,70)2
  366.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  367.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  368.          $(F#,90F#,70F#,110F#,70)2
  369.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  370.          >G4R8.G16C#8<R4.;
  371. }
  372.  
  373. #define FADE_OUT *M1$(R1)4_CSLIDE(7,1,100,0,8,32)
  374.  
  375. Section-B(Key/F#)
  376. {
  377.   1[1] = L8$(<B.B.B>C+.C+.C+$(F+.F+.F+)2)4$FADE_OUT;
  378.   2[1] = L8F+.F+.F+G+.A+.B>C+2.<F+FF+.F+.F+G+.A+.BB>C+16<A+2R16F+F
  379.          F+.F+.F+G+.A+.B>C+2.<F+F F+.F+.F+G+.A+.BB2A+2$FADE_OUT;
  380.   3[1] = L2(<B>|D+|F+)(C+|F|G+)(C+|F+|A+)(D+|F+|A+)
  381.          (<B>|D+|F+)(C+|F|G+)(C+|F+|A+)(C+|F-|A+)
  382.          (<B>|D+|F+)(C+|F|G+)(C+|F+|A+)(D+|F+|A+)
  383.          (<B>|D+|F+)(C+|F|G+)(C+|F+|B)(C+|F+|A+)$FADE_OUT;
  384.   4[1] = $(<B>D+F+D+)2$(C+FG+F)2$(C+F+A+F+)2$(D+F+A+F+)2
  385.          $(<B>D+F+D+)2$(C+FG+F)2$(C+F+A+F+)2$(C+F-A+F-)2
  386.          $(<B>D+F+D+)2$(C+FG+F)2$(C+F+A+F+)2$(D+F+A+F+)2
  387.          $(<B>D+F+D+)2$(C+FG+F)2$(C+F+BF+)2$(C+F+A+F+)2$FADE_OUT;
  388.   5[1] = (<B.B.B>|D+.D+.D+|F+.F+.F+)(C+.C+.C+|F.F.F|G+.G+.G+)
  389.          (C+.C+.C+|F+.F+.F+|A+.A+.A+)(D+.D+.D+|F+.F+.F+|A+.A+.A+)
  390.          (<B.B.B>|D+.D+.D+|F+.F+.F+)(C+.C+.C+|F.F.F|G+.G+.G+)
  391.          (C+.C+.C+|F+.F+.F+|A+.A+.A+)(C+.C+.C+|F-.F-.F-|A+.A+.A+)
  392.          (<B.B.B>|D+.D+.D+|F+.F+.F+)(C+.C+.C+|F.F.F|G+.G+.G+)
  393.          (C+.C+.C+|F+.F+.F+|A+.A+.A+)(D+.D+.D+|F+.F+.F+|A+.A+.A+)
  394.          (<B.B.B>|D+.D+.D+|F+.F+.F+)(C+.C+.C+|F.F.F|G+.G+.G+)
  395.          (C+.C+.C+|F+.F+.F+|B.B.B)(C+.C+.C+|F+.F+.F+|A+.A+.A+)
  396.          $FADE_OUT;
  397.   6[1] = (F+.F+.F+G+.A+.B>C+2.<F+F|D+.D+.D+E+.F+.G+A+2.D+C+)
  398.          (F+.F+.F+G+.A+.BB>C+16<A+2R16F+F
  399.          |D+.D+.D+E+F+.G+G+A+16F+2R16D+C+)
  400.          (F+.F+.F+G+.A+.B>C+2.<F+F|D+.D+.D+E+F+.G+A+2.D+C+)
  401.          (F+.F+.F+G+.A+.BB2A+2|D+.D+.D+E+F+.G+G+2F+2)$FADE_OUT;
  402.   7[1] = L8(<B.B.B>|D+.D+.D+)(C+.C+.C+|F.F.F)
  403.          (C+.C+.C+|F+.F+.F+)(D+.D+.D+|F+.F+.F+)
  404.          (<B.B.B>|D+.D+.D+)(C+.C+.C+|F.F.F)
  405.          (C+.C+.C+|F+.F+.F+)(C+.C+.C+|F-.F-.F-)
  406.          (<B.B.B>|D+.D+.D+)(C+.C+.C+|F.F.F)
  407.          (C+.C+.C+|F+.F+.F+)(D+.D+.D+|F+.F+.F+)
  408.          (<B.B.B>|D+.D+.D+)(C+.C+.C+|F.F.F)
  409.          (B.B.B|F+.F+.F+)(A+.A+.A+|F+.F+.F+)$FADE_OUT;
  410.   8[1] = L2(<B>|D+|F+)(C+|F|G+)(C+|F+|A+)(D+|F+|A+)
  411.          (<B>|D+|F+)(C+|F|G+)(C+|F+|A+)(C+|F-|A+)
  412.          (<B>|D+|F+)(C+|F|G+)(C+|F+|A+)(D+|F+|A+)
  413.          (<B>|D+|F+)(C+|F|G+)(C+|F+|B)(C+|F+|A+)$FADE_OUT;
  414.  10[1] = $(CRDR16C16CRDR)7C16>D8D16<B16B8C16
  415.          L24BADBBBL8(G16G16>C#8<|C8C8)$FADE_OUT;
  416.  10[2] = >C#,110<F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  417.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  418.          $(F#,90F#,70F#,110F#,70)2
  419.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  420.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  421.          $(F#,90F#,70F#,110F#,70)2
  422.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  423.          F#,90F#,70F#,110F#,70F#,90F#,70F#,110A#,110
  424.          $(F#,90F#,70F#,110F#,70)2
  425.          F#,90F#,70F#,110F#,70$(F#,90F#,70F#,110F#,70)3
  426.          >G4R8.G16C#8<R4.;
  427. }
  428.  
  429.